home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 90 / CD Actual 90.iso / Software3D / VirtualLight / VLight1.3win32.exe / VibSDK / Samples / sample5.vs < prev    next >
Encoding:
Text File  |  2002-10-07  |  774 b   |  23 lines
  1. ReadArchive "statics.vib"
  2.  
  3. Declare ball = Shader [ FunctionalSurface [
  4.   Color mix(UVImageMapping(ImageFile("displace.tga", NORMALIZED)),'0.9412, 0.5020, 0.5020',0.5)
  5.   Kd 0.8
  6.   Ks 0.2
  7.   Kr 0.1
  8.   GaussianSpecularBRDF 10
  9.  ]
  10. ]
  11.  
  12. Declare veins = SpectrumOfColors(
  13.      [0.000, '0.898, 0.898, 0.851', 0.212, '0.969, 0.980, 0.875']
  14.      [0.212, '0.969, 0.980, 0.875', 0.424, '0.859, 0.859, 0.859']
  15.      [0.424, '0.859, 0.859, 0.859', 0.627, '0.992, 0.922, 0.659']
  16.      [0.627, '0.992, 0.922, 0.659', 0.881, '0.937, 0.965, 0.902']
  17.      [0.881, '0.937, 0.965, 0.902', 1.01,  '0.898, 0.898, 0.851'])
  18.  
  19. Declare veins_pattern = Shader [
  20.  FunctionalSurface [ Kd 0.85 Color veins[Agate] ]
  21. ]
  22.  
  23. static Emboss = (N*(PixelHeight(ImageFile("displace.tga", NORMALIZED), (u, 0, v)))*0.001)